home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 4
/
FM Towns Free Software Collection 4 - Disc 1.iso
/
data
/
trau
/
piano02a.mml
< prev
next >
Wrap
Text File
|
1991-10-18
|
5KB
|
243 lines
/****************** piano02a.mml ******************/
#ifdef piano02a
#include "piano02.h"
#define 1ST
#endif
/==================================================/
#ifdef 1ST
/**************************************************/
/* sentence <1> */
/* phrase:1 bar:0 (0) */
/**************************************************/
o1r
o1r
o2r
o2r
o1r
o2r
o2r
o3r
o3r
o3r
o3r
o3r2. !#+6c4
o4r
o3r
.next
/**************************************************/
/* phrase:1 bar:1 (1) */
/**************************************************/
r
!#+4f&
r4 !#-15c2.&
r4 !#-15F2.&
!#+1f4 r2.
r
r4 !#-15a2.&
r4 !#-15c2.&
r2r8 !#+1e4.&
r2. !#+4f4&
r2.r8 !#+8a8&
r>
r
!#+6f&
.next
#endif
/-------------------------------------------------/
#ifdef 2ND
/**************************************************/
/* phrase:1 bar:1 (9) */
/**************************************************/
$TEMPO r
!#+4f&
r4 !#-15>c2.&
r4 !#-15>f2.&
!#+1<f4 r2.
r
r4 !#-15f2.&
r4 !#-15c2.&
r2r8 !#+1e4.&
r2. !#+4f4&
r2.r8 !#+8a8&
r
r>
!#+6<f&
.next
#endif
/==================================================/
/**************************************************/
/* phrase:1 bar:2 (2),(10) */
/**************************************************/
r
f4 r2.
c4 r2.
f8 r8r2.
r8. !#+7b-2&b-8. r8
r8.r32 !#+8f32&f2.
a4 r2.
c8 r8 !#+13d2&d8 r8
e8 r2. !#+2<b-8
f8 r8 !#+8f2.&
a8 r2r8 !#+4c8 r8
!#+12c8 r2. !#+2d8
r8 !#+15f2&f16 r16 !#+3e8 r8
f8 r8 !#+18>f2&f8 r8
.next
/**************************************************/
/* phrase:1 bar:3 (3),(11) */
/**************************************************/
r
r
r
r
!#+4>c4 r2 !#-1<a8 r8
r4 !#+4c2 r8 !#+1c8
r2 !#+1g4 r8 !#-1g8
!#+2<a4 r8 !#+1a8 r4 f8 r8
r4 !#+2b-8 r4. >c4&
f4 r2.
r4 e2 r8 e8
r4. !#+1<a8 r4 !#+1f8 r8
!#+2c4 !#+2<g8 r8 !#+1b-4 r8 g8
r8 !#-3f16&f64 r32.r4. !#-4d16&d64 r32.r4
.next
/**************************************************/
/* phrase:1 bar:4 (4),(12) */
/**************************************************/
r
r
r
r2r8 !#-2<b-8 r4
!#+2>f4 r8 d8 r4 !#-4<g8 r8
r4 c8 r8 !#-2c8 r4 !#-4<a8
r4 !#-3g2 r4
!#-2a4 !#-3>c2 r4
c4 r2.
f4 r2.
r4 !#-4e2 r4
a4 r2 !#+7c4
r4 !#-1g2 r4
r8 !#-5c8 r2.
.next
/**************************************************/
/* phrase:2 bar:1 (5),(13) */
/**************************************************/
r
!#+4f&
r4 !#-15c2.&
r4 !#-15>f2.&
!#+1f4 r2.
r
r4 !#-15a2.&
r4 !#-15c2.&
r2r8 !#+2e4.&
r2. !#+5f4&
r2.r8 !#+9a8&
r
r
!#+6<f&
.next
/==================================================/
#ifdef 1ST
/**************************************************/
/* phrase:2 bar:2 (6) */
/**************************************************/
r
f4 r2.
c4 r2.
f8 r8r2.
r8. !#+8>c+2&c+8. r8
r8.r32 !#+9>a32&a2.&
a4 r2.
c8 r8 !#+14e2.
e8 r8 !#+8a2.&
f8 r8 !#+7g2.
a8 r2. !#+2>e8
!#+13>c8 r8r2 !#+2f8 r8
r8 !#+16>a4.&a16 r16 !#+3g4 r8
f8 r8 !#+18>a2&a8 r8
.next
#endif
/--------------------------------------------------/
#ifdef 2ND
/**************************************************/
/* phrase:2 bar:2 (14) */
/**************************************************/
r4 t-20r4. t+15r8 t+3r8 $TEMPO(r8)
f4 r2.
c4 r2.
f8 r8r2.
r8. !#+8>c+2&c+8. r8
r8.r32 !#+9>a32&a2.&
a4 r2.
c8 r8 !#+14e2.
e8 r8 !#+8a2.&
f8 r8 !#+7g2.
a8 r2. !#+2>e8
!#+13>c8 r8r2 !#+2f8 r8
r8 !#+16>a4.&a16 r16 !#+3g4 r8
f8 r8 !#+18>a2&a8 r8
.next
#endif
/==================================================/
/**************************************************/
/* phrase:2 bar:3 (7),(15) */
/**************************************************/
r
r
r
r4. f8 r2
d4. r8 g4. r8
a4. r2 a8
!#-2>d4. r8r2
r4. !#-2c2 r8
a4. r8 !#-2g4 r8 !#-3c8
r4. !#-2a-8 r4 !#-3e8 r8
r4 !#+1d8 r4 !#-3c8 r8 !#-3<f+8
!#+2f4. r8 !#+1e4. r8
r4. !#+1f8 r4. e-8
r8 a4 r8r2
.next
/**************************************************/
/* phrase:2 bar:4 (8),(16) */
/**************************************************/
t-2r8t-3r8t-3r8t-2r8t-2r8r8t+8r4
r
r2.r8 !#-5<g8
!#+5g2 r4 !#-5<b-8 r8
r2 !#-4c4 r4
r2r8 !#-4d8 r4
!#-1<b4. !#-3b8 r2
r4 !#-2<a8 r8 !#-4>c4 r4
r8 !#-3g4 r8 !#-5e4 r4
!#-4f2 r2
r
!#-1d4. r8 !#-2c2
r4. !#-3c8 r4. !#+7<c8
r4 !#-1e4 r2
.next
/**************************************************/
/************** end of piano02a.MML ***************/